home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #14 / Monster Media No. 14 (April 1996) (Monster Media, Inc.).ISO / database / cointo.zip / MENU.BAT < prev    next >
DOS Batch File  |  1996-01-10  |  2KB  |  63 lines
  1. cls
  2. @echo off
  3. ECHO.
  4. echo.          
  5. echo.          
  6. echo.          
  7. echo.                                COIN COLLECTION          
  8. echo.                                   INVENTORY
  9. echo. 
  10. echo.
  11. echo. 
  12. echo.            ╔═══════════════════════════════════════════════════════╗
  13. echo             ║                                                       ║
  14. echo             ║             A.)  ADD NEW COIN RECORDS                 ║
  15. echo             ║             B.)  QUICK VIEW BY NAME                   ║
  16. echo             ║             C.)  QUICK VIEW BY VALUE                  ║
  17. echo             ║             D.)  DELETE A COIN RECORD                 ║
  18. echo             ║             E.)  MODIFY A COIN RECORD                 ║
  19. echo             ║                                                       ║
  20. echo             ║             Q.)  EXIT THE PROGRAM                     ║
  21. echo             ║                                                       ║
  22. echo             ╚═══════════════════════════════════════════════════════╝     
  23. echo.
  24. echo                            Please enter your selection
  25.  
  26.  
  27. NEWBIN ABCDEQ
  28. IF ERRORLEVEL 6 CALL GOTO QUIT
  29. IF ERRORLEVEL 5 CALL GOTO EDRIVE
  30. IF ERRORLEVEL 4 CALL GOTO DDRIVE
  31. IF ERRORLEVEL 3 CALL GOTO CDRIVE
  32. IF ERRORLEVEL 2 CALL GOTO BDRIVE
  33. IF ERRORLEVEL 1 CALL GOTO ADRIVE
  34.  
  35. :ADRIVE
  36. cls
  37. COINS.EXE
  38. menu
  39.  
  40. :BDRIVE
  41. cls
  42. COINLST.EXE
  43. menu
  44.  
  45. :CDRIVE
  46. cls
  47. COINLST2.EXE
  48. menu
  49.  
  50. :DDRIVE
  51. cls
  52. COINDEL.EXE
  53. menu
  54.  
  55. :EDRIVE
  56. cls
  57. COINCHG.EXE
  58. menu
  59.  
  60. :QUIT
  61. TEX.EXE
  62. cls
  63. CD\.